﻿Public Class FormaPago
    Dim _FOPCOD, _FOPDESC, _CNVCOD, _FOPACT As String
    Dim _FOPMON As Decimal

    Sub New()

    End Sub

    Sub New(ByVal FOPCOD As String, ByVal FOPDESC As String, ByVal CNVCOD As String, ByVal FOPMON As Decimal, ByVal FOPACT As String)
        Me._FOPCOD = FOPCOD
        Me._FOPDESC = FOPDESC
        Me._CNVCOD = CNVCOD
        Me._FOPMON = FOPMON
        Me._FOPACT = FOPACT
    End Sub

    Public Property FOP_Codigo() As String
        Get
            Return _FOPCOD
        End Get
        Set(ByVal value As String)
            _FOPCOD = value
        End Set
    End Property

    Public Property FOP_Descripcion() As String
        Get
            Return _FOPDESC
        End Get
        Set(ByVal value As String)
            _FOPDESC = value
        End Set
    End Property

    Public Property CNV_Codigo() As String
        Get
            Return _CNVCOD
        End Get
        Set(ByVal value As String)
            _CNVCOD = value
        End Set
    End Property

    Public Property FOP_MontoMin() As Decimal
        Get
            Return _FOPMON
        End Get
        Set(ByVal value As Decimal)
            _FOPMON = value
        End Set
    End Property

    Public Property FOP_Activo() As String
        Get
            Return _FOPACT
        End Get
        Set(ByVal value As String)
            _FOPACT = value
        End Set
    End Property
End Class
